#lang scribble/doc

@(require scribble/manual)


@title{Shape Cloud}

@defproc[(shape-cloud
          (d1 (and/c real? positive?))
          (d2 (and/c real? positive?))
          (r (and/c real? positive?))
          (n (and/c integer? (not/c negative?)))
          (shape-fn (-> (and/c real? positive?) . (and/c point?) . any/c)))
         any/c]
{
Creates @racket[n] randomly positioned shapes given by @racket[shape-fn] contained in a spherical region of radius @racket[r]. The distance of the spheres to the center of the spherical region is in the interval [@racket[d1], @racket[d2]\[.
}